home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / PCTAGS15.ARJ / SORT.DIF < prev    next >
Text File  |  1991-10-02  |  6KB  |  260 lines
  1. *** tmp\sort.c    Sun Aug 26 23:19:34 1990
  2. --- sort.c    Wed Oct 02 20:13:38 1991
  3. ***************
  4. *** 30,39 ****
  5. --- 30,44 ----
  6.   static char version[] = "GNU sort, version 0.3";
  7.   
  8.   #include "std.h"
  9. + 
  10.   #ifndef MSDOS
  11.   #include "unix.h"
  12.   #endif /* not MSDOS */
  13.   
  14. + #ifdef SORT_MODULE
  15. + #include "sort.h"
  16. + #endif
  17. + 
  18.   #include <errno.h>
  19.   #include <signal.h>
  20.   #include <stdio.h>
  21. ***************
  22. *** 72,78 ****
  23. --- 77,85 ----
  24.   static void usage (void);
  25.   static void badfieldspec (char *s);
  26.   static void inthandler (void);
  27. + #ifndef SORT_MODULE
  28.   int main (int argc, char **argv);
  29. + #endif
  30.   #endif /* MSDOS */
  31.   
  32.   /* A few useful macros. */
  33. ***************
  34. *** 187,192 ****
  35. --- 194,202 ----
  36.                  "      the MS-DOS version.  For files with short lines, use\n"
  37.                  "      the `-S <num>' option to reduce the buffer size.\n");
  38.         cleanup ();
  39. + #ifdef SORT_MODULE
  40. +       external_cleanup();
  41. + #endif
  42.         exit (-1);
  43.       }
  44.   }
  45. ***************
  46. *** 239,244 ****
  47. --- 249,258 ----
  48.   {
  49.     struct tempnode *node;
  50.   
  51. + #ifdef MSDOS
  52. +   fcloseall();
  53. + #endif
  54. +     
  55.     for (node = temphead.next; node; node = node->next)
  56.       remove(node->name);
  57.   }
  58. ***************
  59. *** 255,260 ****
  60. --- 269,277 ----
  61.       return r;
  62.     fprintf (stderr, "sort: memory exausted\n");
  63.     cleanup ();
  64. + #ifdef SORT_MODULE
  65. +   external_cleanup();
  66. + #endif
  67.     exit (-1);
  68.   }
  69.   
  70. ***************
  71. *** 267,272 ****
  72. --- 284,292 ----
  73.       return r;
  74.     fprintf (stderr, "sort: memory exhausted\n");
  75.     cleanup ();
  76. + #ifdef SORT_MODULE
  77. +   external_cleanup();
  78. + #endif
  79.     exit (-1);
  80.   }
  81.   
  82. ***************
  83. *** 282,287 ****
  84. --- 302,310 ----
  85.       return r;
  86.     fprintf(stderr, "sort: memory exausted\n");
  87.     cleanup();
  88. + #ifdef SORT_MODULE
  89. +   external_cleanup();
  90. + #endif
  91.     exit(-1);
  92.   }
  93.   
  94. ***************
  95. *** 296,301 ****
  96. --- 319,327 ----
  97.       return r;
  98.     fprintf(stderr, "sort: memory exhausted\n");
  99.     cleanup();
  100. + #ifdef SORT_MODULE
  101. +   external_cleanup();
  102. + #endif
  103.     exit(-1);
  104.   }
  105.   
  106. ***************
  107. *** 312,317 ****
  108. --- 338,346 ----
  109.     fprintf(stderr, "sort: cannot open %s (%s): %s\n", file, how,
  110.             strerror(errno));
  111.     cleanup();
  112. + #ifdef SORT_MODULE
  113. +   external_cleanup();
  114. + #endif
  115.     exit(-1);
  116.   }
  117.   
  118. ***************
  119. *** 325,330 ****
  120. --- 354,362 ----
  121.         {
  122.           fprintf(stderr, "sort: error in fclose: %s\n", strerror(errno));
  123.           cleanup();
  124. + #ifdef SORT_MODULE
  125. +         external_cleanup();
  126. + #endif
  127.           exit(-1);
  128.         }
  129.   }
  130. ***************
  131. *** 335,344 ****
  132. --- 367,383 ----
  133.        int size, nelem;
  134.        FILE *fp;
  135.   {
  136. + #ifdef MSDOS
  137. +   if (fwrite(buf, size, nelem, fp) < (unsigned) nelem)
  138. + #else /* not MSDOS */
  139.     if (fwrite(buf, size, nelem, fp) < 0)
  140. + #endif /* not MSDOS */
  141.       {
  142.         fprintf(stderr, "sort: error in fwrite: %s\n", strerror(errno));
  143.         cleanup();
  144. + #ifdef SORT_MODULE
  145. +       external_cleanup();
  146. + #endif
  147.         exit(-1);
  148.       }
  149.   }
  150. ***************
  151. *** 354,360 ****
  152.       (struct tempnode *) xmalloc(sizeof (struct tempnode));
  153.   
  154.   #ifdef MSDOS
  155. !   if (len && prefix[len - 1] != '/')
  156.       sprintf(name, "%s/sort%4.4x.%3.3x", prefix, getpid(), ++seq);
  157.     else
  158.       sprintf(name, "%ssort%4.4x.%3.3x", prefix, getpid(), ++seq);
  159. --- 393,399 ----
  160.       (struct tempnode *) xmalloc(sizeof (struct tempnode));
  161.   
  162.   #ifdef MSDOS
  163. !   if (len && prefix[len - 1] != '/' && prefix[len - 1] != '\\')
  164.       sprintf(name, "%s/sort%4.4x.%3.3x", prefix, getpid(), ++seq);
  165.     else
  166.       sprintf(name, "%ssort%4.4x.%3.3x", prefix, getpid(), ++seq);
  167. ***************
  168. *** 448,453 ****
  169. --- 487,495 ----
  170.                      "sort: lines longer than 32k are not supported under\n"
  171.                      "      MS-DOS because of performance considerations.\n");
  172.             cleanup ();
  173. + #ifdef SORT_MODULE
  174. +           external_cleanup();
  175. + #endif
  176.             exit (-1);
  177.           }
  178.   #else /* not MSDOS */
  179. ***************
  180. *** 458,463 ****
  181. --- 500,508 ----
  182.           {
  183.             fprintf(stderr, "sort: read error (%s)\n", strerror(errno));
  184.             cleanup();
  185. + #ifdef SORT_MODULE
  186. +           external_cleanup();
  187. + #endif
  188.             exit(-1);
  189.           }
  190.         buf->used += cc;
  191. ***************
  192. *** 473,478 ****
  193. --- 518,526 ----
  194.                      "sort: lines longer than 32k are not supported under\n"
  195.                      "      MS-DOS because of performance considerations.\n");
  196.             cleanup ();
  197. + #ifdef SORT_MODULE
  198. +           external_cleanup();
  199. + #endif
  200.             exit (-1);
  201.           }
  202.   #else /* not MSDOS */
  203. ***************
  204. *** 1122,1127 ****
  205. --- 1170,1177 ----
  206.             saved.length = lines[ord[0]].lines[cur[ord[0]]].length;
  207.             memcpy(saved.text, lines[ord[0]].lines[cur[ord[0]]].text,
  208.                    saved.length + 1);
  209. +           saved.keybeg = lines[ord[0]].lines[cur[ord[0]]].keybeg;
  210. +           saved.keylim = lines[ord[0]].lines[cur[ord[0]]].keylim;
  211.             savedflag = 1;
  212.           }
  213.         else
  214. ***************
  215. *** 1405,1410 ****
  216. --- 1455,1463 ----
  217.   {
  218.     signal(SIGINT, SIG_DFL);
  219.     cleanup();
  220. + #ifdef SORT_MODULE
  221. +   external_cleanup();
  222. + #endif
  223.   #ifdef MSDOS
  224.     abort ();
  225.   #else /* not MSDOS */
  226. ***************
  227. *** 1423,1429 ****
  228. --- 1476,1486 ----
  229.   #endif /* not MSDOS */
  230.   
  231.   int
  232. + #ifdef SORT_MODULE
  233. + sort_main(argc, argv)
  234. + #else
  235.   main(argc, argv)
  236. + #endif
  237.        int argc;
  238.        char *argv[];
  239.   {
  240. ***************
  241. *** 1753,1758 ****
  242. --- 1810,1826 ----
  243.       merge(files, nfiles, ofp);
  244.     else
  245.       sort(files, nfiles, ofp);
  246. + 
  247. +   /* close the file */
  248. +   if (ofp != stdout)
  249. +     fclose(ofp);
  250. + 
  251.     cleanup();
  252. + 
  253. + #ifdef SORT_MODULE
  254. +   return(0);
  255. + #else /* not SORT_MODULE */
  256.     exit(0);
  257. + #endif /* not SORT_MODULE */
  258. + 
  259.   }
  260.